home *** CD-ROM | disk | FTP | other *** search
- # Interaktiv vorbereiteter Download mit ConNect
- # Version 2.0, 19/07/94, 07:27:32 Uhr
-
- NAME="Andreas Schrell"
- PASS="xxxxxx"
- Maus="rs"
-
- # Pfade für Dateien:
- DOWNLOAD="e:\\dfue\\download"
- FILELIST="e:\\dfue\\download\\files"
-
- # Pfade für den Tausch:
- sendfile='e:\\dfue\\cat\\export\\infile.txt'
- recepath='e:\\dfue\\cat\\import'
-
- TIMEOUT=30
-
- # Fileliste in $Maus$GPTNAME.lzh umbenennen? = 1, sonst = 0
- # cp und rm müssen vorhanden sein und keine Dateien $Maus-*.lzh
- # im Filelistenverzeichnis. Mauskürzel ggf. in Kleinbuchstaben!
- UMBENENNEN=1
-
- echo ""
- echo "Interaktiv vorbereiteter Download aus der $Maus"
- echo ""
-
- echo -n "Andere Maus (.=$Maus): "
- read eingabe
- if [ "$eingabe" != "." ]; then
- Maus="$eingabe"
- fi
-
- echo -n "Anderer Name (.=$NAME): "
- read eingabe
- if [ "$eingabe" != "." ]; then
- NAME="$eingabe"
- fi
-
- if [ "$NAME" != "gast" ]; then
- echo -n "Anderes Pass (.=$PASS): "
- read eingabe
- if [ "$eingabe" != "." ]; then
- PASS="$eingabe"
- fi
- else
- PASS=""
- fi
-
- echo "Daten: [$Maus] [$NAME] [$PASS]"
-
- echo ""
-
- function xwaitfor {
- waitfor -t $TIMEOUT "Leertaste -" "$1" "$2" "$3" "$4" "$5"
- if [ $WAITID -eq 0 ]; then
- echo "Timeout"
- hangup
- exit
- fi
- if [ $WAITID -eq 1 ]; then
- send -n " "
- xwaitfor "$1"
- fi
- }
-
- function fileliste {
- send -n a
- xwaitfor "Eingabe:"
- send -n o
- xwaitfor "dauern" "Packer:"
- if [ $WAITID -eq 2 ]; then
- send -n j
- xwaitfor "Packer:"
- fi
- send -n l
- xwaitfor "Protokoll"
- send -n Z
- xwaitfor "B00"
- download -p "$FILELIST"
- if [ $UMBENENNEN -eq 1 ]; then
- rm -f "$FILELIST\\$Maus$GPTNAME.lzh"
- if cp $FILELIST\\$Maus-*.lzh "$FILELIST\\$Maus$GPTNAME.lzh"; then
- rm $FILELIST\\$Maus-*.lzh
- fi
- fi
- xwaitfor "Eingabe:"
- }
-
-
- function mylogin {
- dial -s 10 -r 100 -v "$Maus "
- xwaitfor "Benutzer? (J/N)"
- send -n j
- xwaitfor "Name"
- send $NAME
- xwaitfor "ssword"
- send $PASS
- xwaitfor "Eingabe:"
- send -n p
- xwaitfor "Eingabe:"
- waitfor -t 10 "nglich" "Eingabe:"
- if [ $WAITID -eq 1 ]; then
- echo "Programmteil z. Zt. nicht zugänglich."
- xwaitfor "Eingabe:"
- send -n i
- xwaitfor "Eingabe:"
- send -n l
- hangup
- exit
- fi
- }
-
- function gastlogin {
- dial -s 10 -r 100 -v "$Maus "
- xwaitfor "Benutzer? (J/N)"
- send -n n
- xwaitfor "eintragen"
- send -n n
- xwaitfor "Eingabe:"
- send -n p
- waitfor -t 3 "nglich" "Eingabe:"
- if [ $WAITID -eq 1 ]; then
- echo "Programmteil z. Zt. nicht zugänglich."
- xwaitfor "Eingabe:"
- send -n i
- xwaitfor "Eingabe:"
- send -n l
- hangup
- exit
- fi
- }
-
- function gpt {
- send -n g
- xwaitfor "=Hilfe):"
- send $1
- xwaitfor "Eingabe:"
- GPTNAME=$1
- }
-
- function opt {
- send -n o
- xwaitfor "Eingabe:"
- GPTNAME=OEFF
- }
-
- function sauge {
- send -n e
- xwaitfor "Protokoll"
- send -n z
- xwaitfor "Welche"
- send $1
- xwaitfor "B00"
- download -p "$DOWNLOAD"
- xwaitfor "Eingabe:"
- }
-
- function ende {
- send -n z
- xwaitfor "Eingabe:"
- if [ $BEENDEN -eq 1 ]; then
- send -n s
- hangup
- fi
- }
-
- function tausch {
- send -n z
- xwaitfor -t 17 Eingabe:
- send -n t
- xwaitfor -t 16 \[0m:' '
- send -n z
- xwaitfor -t 18 B01
- upload "$sendfile"
- xwaitfor -t 43 B00
- download -p "$recepath"
- xwaitfor Eingabe:
- send -n p
- }
-
- if [ "$NAME" = "gast" ]; then
- echo "gastlogin" > dl.scr
- else
- echo "mylogin" > dl.scr
- fi
-
- echo "Maus=$Maus" >> dl.scr
-
- Ende=0
-
- function Hilfe {
- echo "Beispiele für die Auswahl:"
- echo "o 1 4 18 = Sauge im ÖPT die Files 1 4 18"
- echo "g tex 4 18 = Sauge im GPT tex die Files 4 18"
- echo "o fl = Fileliste des ÖPT"
- echo "g tex fl = Fileliste des GPT tex"
- echo "t = MausTausch"
- echo "s = Login und Starten"
- echo "S = wie "s" aber am Ende in der Maus bleiben"
- echo "x = Abbruch"
- echo "? = Hilfe"
- }
-
- while [ $Ende -eq 0 ]
- do
- echo -n "Auswahl (?=Hilfe): "
- read teil gpt files
- if [ "$teil" = "x" ]; then
- echo "Abbruch".
- exit
- fi
- if [ "$teil" != "s" -a "$teil" != "S" ]; then
- if [ "$teil" = "g" ]; then
- echo "gpt $gpt" >> dl.scr
- else
- if [ "$teil" = "?" ]; then
- Hilfe
- break 3
- else
- if [ "$teil" = "t" ]; then
- if ! [ -f $sendfile ]; then
- echo "Es gibt kein Infile!"
- break 5;
- fi
- echo "tausch" >> dl.scr
- else
- echo "opt" >> dl.scr
- if [ "$files" != "" ]; then
- files="$gpt $files"
- else
- files="$gpt"
- fi
- fi
- fi
- fi
- if [ "$files" = "fl" ]; then
- echo "fileliste" >> dl.scr
- else
- if [ ! "$files" = "" ]; then
- echo "sauge \"$files\"" >> dl.scr
- fi
- fi
- else
- Ende=1
- if [ "$teil" = "S" ]; then
- echo "BEENDEN=0" >> dl.scr
- else
- echo "BEENDEN=1" >> dl.scr
- fi
- echo "ende" >> dl.scr
- fi
- done
-
- . dl.scr
-